IZBBE Yi$=“ -------— ——~~—~":REMx*x****5? 12381 RETURN 12858 Y1$="ADJ.EHnN.PUHER DH":REMX##X58 12851 GOSUB12921 12852 UNY9GOTO12853.12854 12853 GOSUB12868 12854 GOSUB1298?:GOSUB12863 12355 Y3$="AN"+Y4$:GOSUB11312:Y2=Y 12856 Y5$="BO11B.":GOSUB16818 12857 UNY9GOTO12859.12858 12858 GOSUB1195B:Y=Y2:RETURN 12859 GOSUB11958:Y=68:YRw1:GOSUB12358:T=Y2:RETURN 12868 Y=68:YA¤1.25:GOSUB12358:Y=¥#18 12861 IFY>4995THENY=4995 12862 GOSUB:BHBB:RETURN 12863 T5$=“hD"+HID$(5TR$:GOSUB1B358LRE 12988 Y1$="ADJ.CHAN.PDHER UH":REM****59 12981 GOSUB12921 12982 DNY9GDTU129B3.129B1 12983 GOSUB1286B 12984 GOSUB129B?:GOSUB12Bé3 12985 Y3$=“H2"+Y9$:GOSUB11312:Y2¤Y 1298é GOTO12B56 12987 IFY9=1THENRETURN 12983 IFY9=2THENY5$¤"RD117.":GOSUB16818 12989 DN(AND(Y¤1DRY¤—1)THENY9=1:HHW 12924 IFY5$<>"P“THENY9=2:RETURN 12925 GBTU14958 12958 Y1$=" ----- —--- ·-·- —~~~":REMIK¥*#Xt68 12951 RETURN 13888 Y1$=" ----—- -—— -~·-- —~~~“:REM***IX*#61 13881 RETURN 13858 Y1$¤"RECEIVER-TEST"}REMX**XIKX*62 13851 Y$%="HR.":GOSUB16818:Y¤Xt1):GOTO18338 13188 Y1$="~~~—~—— ·---······· ——~—“:REM**X**#*63 13181 RETURN 13158 Y1$¤“RX"S/N~HEAS.":REM**#*¥**Xl64 13151 Y=T$Xt8)/1B81GOSUB1855E 13152 Y=1:GOSUB18758 13153 Y5$¤“BB.“:GOSUB16818:GOSUB168B8 13151 IF L_r;FT$t Ytids . 12) =*'FsE:"THENY=· (INT1 1 Bnwhl. (HIDM 1*553% . 3 . 9 > 3 D J/18 : RETURN 13155 GDTD14958 13288 Y15¤"RX»SINRD-HEHE.":REMX*XXtKX65 13218 Y¤T*X(8>/188:GD3UB18558 13212 Y¢1:GOSUB1875B 13214 ¥5$¤“AS.":GD5UE16818 13215 GU5U316BB8 13216 IF LEFT$lY59.2)¤"¤5"THENY=(INT(18#U¤LJl)/1B:RETURN